object fCorrecao: TfCorrecao
  Left = 324
  Top = 164
  Width = 935
  Height = 539
  BorderIcons = [biSystemMenu]
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DBText2: TDBText
    Left = 388
    Top = 267
    Width = 424
    Height = 25
    DataField = 'NOME_INQUILINO'
    DataSource = dtsrcLanInq
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -19
    Font.Name = 'Cooper Blk BT'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object DBText1: TDBText
    Left = 388
    Top = 81
    Width = 423
    Height = 25
    DataField = 'NOME_PROPRIETARIO'
    DataSource = dtsrsLanpro
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -19
    Font.Name = 'Cooper Blk BT'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label1: TLabel
    Left = 732
    Top = 12
    Width = 53
    Height = 13
    Caption = 'Data Inicial'
  end
  object Label2: TLabel
    Left = 832
    Top = 12
    Width = 22
    Height = 13
    Caption = 'Parc'
  end
  object DBGrid1: TDBGrid
    Left = 386
    Top = 108
    Width = 425
    Height = 157
    DataSource = dtsrsLanpro
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'COD_CONTAS'
        Title.Caption = 'Conta'
        Width = 35
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PARCELA'
        Title.Caption = 'Parc.'
        Width = 40
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VENCIMENTO'
        Title.Caption = 'Vencimento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ATIVO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VALOR'
        Title.Caption = 'Valor'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_INQUILINO'
        Title.Caption = 'Cod Inq.'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_PROPRIETARIO'
        Title.Caption = 'Cod Pro'
        Visible = True
      end>
  end
  object DBGrid2: TDBGrid
    Left = 7
    Top = 76
    Width = 375
    Height = 373
    DataSource = dtsrcImovel
    FixedColor = clMoneyGreen
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'COD_IMALU'
        Title.Caption = 'ID'
        Width = 40
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_IMOBILIARIA'
        Title.Caption = 'Contrato'
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DATA_LOCA'
        Title.Caption = 'Loca'#231'.'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DATA_VCONT'
        Title.Caption = 'Venc.'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PRAZO_REPASSE'
        Title.Caption = 'Rep.'
        Width = 24
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DIAPGTO'
        Title.Caption = 'Pgto'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_INQUILINO'
        Title.Caption = 'Inq.'
        Width = 30
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_PROPRIETARIO'
        Title.Caption = 'Prop.'
        Width = 30
        Visible = True
      end>
  end
  object DBGrid3: TDBGrid
    Left = 386
    Top = 289
    Width = 425
    Height = 160
    DataSource = dtsrcLanInq
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'COD_CONTAS'
        Title.Caption = 'Conta'
        Width = 35
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PARCELA'
        Title.Caption = 'Parc.'
        Width = 40
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VENCIMENTO'
        Title.Caption = 'Vencimento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VALOR'
        Title.Caption = 'Valor'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_INQUILINO'
        Title.Caption = 'Cod Inq.'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_PROPRIETARIO'
        Title.Caption = 'Cod Pro'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ATIVO'
        Visible = True
      end>
  end
  object EvDBFind1: TEvDBFind
    Left = 6
    Top = 18
    Width = 73
    Height = 57
    DataField = 'COD_IMOBILIARIA'
    DataSource = dtsrcImovel
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -43
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnKeyPress = EvDBFind1KeyPress
  end
  object EvDBFind2: TEvDBFind
    Left = 79
    Top = 18
    Width = 480
    Height = 29
    DataField = 'NOME_PROPRIETARIO'
    DataSource = dtsrcImovel
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnKeyPress = EvDBFind1KeyPress
  end
  object EvDBFind3: TEvDBFind
    Left = 79
    Top = 47
    Width = 480
    Height = 29
    DataField = 'NOME_INQUILINO'
    DataSource = dtsrcImovel
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnKeyPress = EvDBFind1KeyPress
  end
  object BitBtn1: TBitBtn
    Left = 562
    Top = 36
    Width = 40
    Height = 40
    TabOrder = 6
    OnClick = BitBtn1Click
    Glyph.Data = {
      660F0000424D660F000000000000360000002800000024000000240000000100
      180000000000300F0000EB0A0000EB0A00000000000000000000FEFBFEFEF9FF
      FCFFF7DDDDEAE1E6E7E1E3EBE6E7E9E7EBDEE7E6EAE8E4F0E6E6E6E9EAE9DCE8
      E3E4ECEAE1E4E5E7E9EBE1E6EADFE4ECDDE8E8E5E7E9EAE8EBE8E7E9E4E9EADA
      E7EBE6E6E6E5E7E8DEE1E4E6EAEEE1E8ECE4EAEEDCDFECE6E3ECD8E9ECD7E7E0
      FFFDFEFFFAFEF8FBFAF9FFFFDCF3E8243F4C1C4245274D5E1A416B2250602750
      722C5082254F6F285471263D664A5C812831522323432B2A4626273E252A4327
      253E2D263F27273F3342572F4A5E193B4222444F1D3C4C27485D22425B2C4C68
      1F4C682E4C71234B73597693EBEDF7FDFFFCFDFCF9FFFFFFDBE9DD173141103B
      4013415405386E0B4662154977184787124674164D760E3E6A2F577A09224404
      083312113812102B100F38110E36130F3607103213304D133F5A0128310E3645
      082F42173A5911355824446A0240691D45781A457C4E688EECECF9FFFFFAFEFC
      F8FFFFFFAEC0AE09262F002A25083A460A3843093F3416434C153E570A3B4009
      373D00442F0E4A2F0730210D182D1414351A1B2F121434181734171A3401162A
      01283501394504322408382E002E290D3A3B09373D1540470641680B3D550030
      35365E59DDE0E0FFFFFFF5FEF8F5FFFFAECCB4183C38194A3611433F173D2D0E
      3C181A422F193B3A0F3824062E1A275A345787542B4A2B10132A161239161730
      13153318173318182F03112126454E34656B1C462F113E2907331F0E3C280D3D
      280A3B2406393E295956073E31578778E8F4F0F9FFFFFDFEFBFBFFFBE9FADD65
      736899B192879D8B565D544959384D584A51555B515C4B4C56447E9283E1F5D3
      626C590B002A1C0E481311351C173D1C13371F153411142A6D83928BB2C06268
      5A5760534754454B5C464C61464054364F6E4AAEBCAF688187A3B1BEFFFFFFFE
      FAF9FEFDFDFFFDFEFFFFFF706C6DEFE9ECE6E2E6665C473C2F1745361839290C
      2D1C0F1B0B05C9C5CAF9F6FD5C5C6710112213173012123612182F111831141B
      370A0A21A09AA6F6E7EFC2C0AD332E164439163B2E0C382910140500858282EF
      ECE8A6A19EC4C0BFFFFFFFFEFCFCFEFDFDFFFEFEFFFFFF716F6FE9E7E7E0DFE1
      655E46473D224F4522433719362B161F1408C2C1C2FBFAFE5757603D3D523538
      540F11321819391315371214370A0B24A19FA9EFEAEBB5B4A3403C244F472645
      3B1A40351B1A0E0080807EECECE7A5A3A1BEBDBBFFFFFFFFFFFFFEFDFDFFFEFE
      FFFFFF727070EAE8E8E0DEE170694F5C5535615832544B26463E2128200ABFC0
      BFFFFEFF6362710D0C2318193517193716113715123B14133C0A08259F9CA6E8
      E5E0B7B5A755513A655D3C564E2A50482A271E03828281E7E6E2A19F9EC0BFBE
      FFFFFFFFFEFEFEFEFEFFFFFFFFFFFF686666DBD9D9CAC8CB867E65827A5C8179
      52726A42625B3B3C371AADAEAAE5E5E85C5A6B02001B1A1D390F142F1B152E1A
      153619133E09062695939ED9D9D0BDB9AE77735D898060756D476F6645403919
      797978DCDBD79B9898BCBAB9FFFFFFFDFCFCFEFDFDFFFFFFFFFFFF716F6FE9E7
      E7D8D7D9968E7CA29880A399769188637D76574A442AB7B9B0FFFFFF62607307
      03231316301319313A383D1B182E130E330F0B2AA09FA9E9EAE2C1BEB3948F7C
      ABA282948D658B835F55502C838382EAE9E4A8A6A5BDBBBAFFFFFFFFFEFEFFFD
      FEFFFFFFFFFFFF716F6FE6E4E4D3D2D3A89D90BEB39CC1B493B0A682968B6F5A
      533AB7BAB0F6F7F9625E740A05261315322930498E8D81393643140F2F0B0A28
      9C9DA6E1E5DBCCC8BFAEA994CAC19EB2AC7FA39C7368643B848383E4E3DEA4A3
      A0C0BEBDFFFFFFFFFEFEFEFEFDFCFEFBFFFFFF706D6CE4E0DECDCAC9B7B0A7DE
      D9CFDDDACBC2BFAEB8B89F6F6D50ACB3ABF2F2F76360770B072419162D131225
      202611181E1B171A2A0E0F239A9BA1DADED7CDC6C0CDCAC1E0DCD1C5C2B2C8C3
      AF89846B868486E4E2E2A3A1A0BFBCBBFFFFFFFFFEFDFDFEFCFDFEFCFFFFFF6F
      6C6BE1DDDCD6D2D187827C88847D8C897E8281737575644B4936B3B8AFF5F7FA
      615C7008041E1D1B301B1C2B1D1A211D1A2E1E1C3D0604229794A6E1E0E4C0BF
      BA7C79748E8D858281747F7E6F53503E898788E1DFDE9D9B9AC1BFBEFFFFFFFF
      FDFCFEFEFDFEFEFEFFFFFF6E6B6AE3DFDEE5E1E03131300403030808060A0B06
      0404000B0D05C1C4BDF7F6F85D5B6804011419192A1516231E142B170F2C1913
      3604001D9897A5E8E5E7999B9A0708080506050E0F0A090802000000817E7EE2
      E0DF9E9C9BBEBCBBFFFFFFFFFEFDFDFEFCFEFFFDFFFFFF696766EBE7E6F3EFEE
      FFFFFFF7F9FBF5F7F9F7F9FAFAFCFDF7F9FBF0EEEBF5F4F55B585F0000000000
      0702020805020603020800010B040608949892F6F8E9FAFEFFF5F9FAF9FBFBF9
      F8F9FCFCFEFEFCFDF8F6F5F5F3F29B9998C3C2C1FFFFFFFEFCFBFDFEFCFEFEFD
      FFFFFF504E4DC6C1C0F1EDEBEBE8E9EAE7E9EDEAEBEBE8EAEAE7EAEFEBEFEFED
      ECFAF7F7C4C4C3A6A5A8AAABAFACADB4B4B0ACAFB0ADAAAEADA5ABA8D8DAD3F4
      F3E8E6E8E7E8E8E8E9E9E8EEEBECEFEAECEDE8EBECEAE9EDEBEA82807FB9B7B6
      FFFFFFFFFEFDFFFFFFFFFFFFFFFFFF2F2B2A959090DCD7D8EFEBE7EFEAE8EDE7
      E7EEE8E8EFE7ECEEE5ECEDE9EBEAE8E7F6F5F2FFFFFFFFFFFFFFFFFFFFFFFBFF
      FFFFFCFFFFF9FCFFEFEDF3EFE7EEE9E9E3ECE9E5EFECEAEAE5E3F0E9EAF0E6E9
      E8E7E6CECCCC4E4B4BC3C3BFFFFFFFFFFFFFE5E8F74E4D6777778A25242B2427
      1C70775ED6CAD0E7DEE5E6DFE6E3E0E4E2E4E2DCE2DBE4E0E3E8E6E8CAC8CB97
      97979393939696969C9C9E9E9A9C9F9899B1ACA9D8D8D7E2E8EAEAE6DEE6E2E2
      E3DCE2E9E0EBE8E4E6E4E1DCB4B2AC595C491115088A859B4A4666DADAE7F0F3
      FB7D7E8F0100170000081312162D31268D8685D2CDCAEFEBEAF1EEEFF2F2F1E9
      EBE9F0EEF0F1EEEFABA9A85F5D5C63615D66635F5A595B66636168655E706C69
      C1C1C1EAF0F0F1EBECF4EEF3F1EAF1F4EFF2E5E1DFC9C8BF5E5D5625241F0606
      0B0B04222C2943E4E7EFFCFFFFFFFFFF948FA800000F00000B07050E3C3A2F89
      867DD3D1C8F7F5F2F5F3F4F3F0F5F3F1F5F5F3F3D4D1CF9B9891939085A9A697
      D8D4D9ADABA18582748A8581C2BFC1F3FAF8F6EEF5F5EEF5F9F3F9F6F1F1BDBC
      B67272651316110A0A12000006362C57D8D5E9F8FEF9FAFEF6FBFBFFFFFFFFA9
      A4C00C09210000130A080724241F65665BBEBCB3DAD6D4DBD4DAD6D5D9D0CECE
      B3B1AB4946342D29136B6749B4B0B6666750111300413D35A7A2A6D2D6D3DFD5
      E0DDD7DBD3CFCF9894914E4B471A1612040812000013473E65FFFFFFFFFFFFFE
      FFFCFCFDF9FFFFFFFDFDFFFFFFFFA5A4B80D0C270701120A060F2A2A2487847B
      D1CBC9F3E9F0F6F6F9F0EDECCBC9C1605C46585436878159C1BAC475795B373C
      1059544CC3BCC3F5F9F6F4EFF1E7E5E1BBB9B35855511F1A1D1208120000132B
      284ACECCE6FFFFFFF9FDF7FBFCFDFFFDFFFFFFFDFBFEF9FBFFFFFEFFFFB6B7D4
      00001601000D0A0807322F25817A78D1C5C9EAE8F0E9E7E5CCCABD6460457069
      47988F61B3ADB7898F6A383E0D585348B8B3BBF1F3F1E8E4DFB2AFA7605F531B
      16120E060D0B000E0C0A3C48476FE7EEF6F9FFECFDFFF5FFFBFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFC7C3EA25233A00000909090A27271F696A5DD0CE
      BFEBE5EAC6BCC37A7B6290946DA6A982B8B7AEA1A77C5B5D2F625554C2B6BFEE
      EBE39FA194474C3D10160B00020B030022120A44333032454347E4E1E4FFFFFF
      FFFEFFFDFEFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFCCCBDB342E
      4A00000E0D0B111F1E166E6D60AEA9A9ADA6A993917EA6A58AB5B598ADAAABBB
      BF9F67684269605B9C9498A1A1963C412C1516160501160801240F0C261D1F2F
      26232B45414AE6E5E7FFFFFFFFFFFFFEFFFDFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFCFFF7FFFFFFECE5FD19103200000D0700122B2B206864629B9796C6
      C4B9E0DED0DEDCCDA09BA7EBEDDBB7B89E87817B7974754C4F440F120D03000F
      0700230A0227070616151D161B1620403E45E7E6E8FFFFFFFEFFFEFFFFFEFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFAFFFEFEFEFFFFFFF5F4FB463D5D00
      00270605091917194848445F5B59878482CCCAC1ADADB9BFC0BB50514357534F
      2D2A2C0C0E0E00001C08051E04051000010403040704040A0E0C12343237E7E5
      E7FFFFFFFEFFFCFFFFFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDF6FFFE
      FDFEFFFFFAFFFFFFECEAF640395C00000708090D1114104240401C1B1A626157
      B1B4BC5B5C5A2C2B233C37370C091400000A100D31111026040909010600080A
      060C081008060B27262AE4E3E4FFFFFFFDFEFAFFFFFBFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFEFAFCFFFEFFFBF9FFF7F8FCFFFFFFF5FCF92E2253000001
      040703222123373637727465D5DCDC6E716D312F29100D0D00000502001BA7A9
      C427293A00000001050000000000000000000318171BEAEAEAFFFFFFFBFCF7FE
      FFFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFEFF5A576900000C0706130D0F12252B232F2C2B1513140C0E
      10000004292940C9C9EAE6E6DF3D3D3B45454442424242424342424342424240
      40406C6C6CFFFFFFFFFFFFFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFF3F0F86A66780000000908
      130C0C1417170F0D0B1500000B2E2A49C8C8DAFFFFFFEFEEEDBEBEBEC3C3C3C6
      C6C6C5C5C5C9C9C9C7C7C7C2C2C2C9C9C9FFFFFFFDFDFDFBFBFBFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8F8
      FCFFFFFFFFFFFF5F5A710000020300120A0911000000221B3BE7E2FEFFFFFFFB
      FFFDFEFDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFDFFFFFF
      FFFFFFFDFDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFCFEFFFBFBFEFFFFFFFFFFFF908BA006051600001651
      4E66F9FDFFFFFFFFFDFDFEFBF8FFFDFEFDFCFCFCFEFEFEFFFFFFFDFDFDFFFFFF
      FBFBFBFEFEFEFFFFFFFBFBFBFCFCFCFDFDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBFCFFFBFDFEFAFDFAFE
      FFFFFCFCFF8D889B524D6FEEEFF9FFFFFFFAFEF4FBFBFAFCF6FFFFFFFFFDFDFD
      FEFEFEFCFCFCFCFCFCFEFEFEFFFFFFFDFDFDFEFEFEFCFCFCFFFFFFFDFDFDFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFCFDFFFBFEFCFBFEF8FBFDF8FAFCFEFDFBFFECF5F7FCFFFFFAFCFEFDFEFE
      FEFDFCFDFEF5FAFAFBFFFFFFFFFFFFFBFBFBFFFFFFFDFDFDFDFDFDFEFEFEFFFF
      FFFAFAFAFFFFFFFDFDFD}
  end
  object BitBtn2: TBitBtn
    Left = 813
    Top = 107
    Width = 45
    Height = 38
    TabOrder = 7
    OnClick = BitBtn2Click
    Glyph.Data = {
      360C0000424D360C000000000000360000002800000020000000200000000100
      180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C00066000066000066000066000066000066005B8D5AB5B3B3B5B3B3B5B3
      B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B32D792D00660000
      6600006600006600006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008300008C00008C00008C00008C00007000367C36FAF6F3FDF9F6FDF9
      F6FDF9F6FDF9F6FDF9F6F9F6F3F0EEECE7E5E4DEDDDDDEDDDD327E3200660000
      6600006600007500008A00008300006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300297528FAF6F30066000066
      00006600006600FAF6F3FDF9F6F9F6F3F0EEECE7E5E4DEDDDD37833600660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000073002A7629F6F0ED0066000066
      00006600006600F3F0EDFBF7F4FDF9F7F8F4F2EFECEAE6E4E338843800660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000073002B772AEFE8E40066000066
      00006600006600E9E6E4F5F2EFFCF8F5FDF9F6F6F3F0EDEBE93A863900660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000073002D782BE8DEDB0066000066
      00006600006600DBD8D7ECE9E6F7F3F0FCF9F6FCF9F6F5F1EF3C883B00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300307A2DE0D4D10066000066
      00006600006600C9C7C5DEDCDAEEEBE8F8F4F1FDF9F6FBF8F53E893C00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300327C2FDACCC90066000066
      00006600006600B2B1B0CDCBCAE2DFDDF0EDEAF9F5F3FDF9F63F8B3E00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300357E30D6C6C30066000066
      00006600006600A2A1A1B7B6B5D1CFCDE5E2E0F2EFECFAF7F43F8B3E00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300377F32D6C6C3C9BDBABDB4
      B2B2ADACA9A6A6A3A2A1A3A3A3BCBBBAD5D3D1E8E4E2F4F0EE3E8A3D00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000099000099000099000099000099
      0000990000990000990000990000990000990000990000990000990000990000
      9900009900009900009800008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000099000099000099000099000099
      0000990000990000990000990000990000990000990000990000990000990000
      9900009900009900009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009300008C00018E01049408079B0F0AA0140CA4180DA61A0DA6
      1A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0D
      A61A0DA61A0AA213009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00008000006600036B051187211EA13C29B65130C56133CB6733CB
      6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733
      CB6733CB6726BF4D009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      0066000083000079003B863AFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BB4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0006600006600317D31C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2
      C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3
      C2C2D6BCBB26B24D006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
  end
  object BitBtn3: TBitBtn
    Left = 813
    Top = 289
    Width = 45
    Height = 38
    TabOrder = 8
    OnClick = BitBtn3Click
    Glyph.Data = {
      360C0000424D360C000000000000360000002800000020000000200000000100
      180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C00066000066000066000066000066000066005B8D5AB5B3B3B5B3B3B5B3
      B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B32D792D00660000
      6600006600006600006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008300008C00008C00008C00008C00007000367C36FAF6F3FDF9F6FDF9
      F6FDF9F6FDF9F6FDF9F6F9F6F3F0EEECE7E5E4DEDDDDDEDDDD327E3200660000
      6600006600007500008A00008300006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300297528FAF6F30066000066
      00006600006600FAF6F3FDF9F6F9F6F3F0EEECE7E5E4DEDDDD37833600660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000073002A7629F6F0ED0066000066
      00006600006600F3F0EDFBF7F4FDF9F7F8F4F2EFECEAE6E4E338843800660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000073002B772AEFE8E40066000066
      00006600006600E9E6E4F5F2EFFCF8F5FDF9F6F6F3F0EDEBE93A863900660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000073002D782BE8DEDB0066000066
      00006600006600DBD8D7ECE9E6F7F3F0FCF9F6FCF9F6F5F1EF3C883B00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300307A2DE0D4D10066000066
      00006600006600C9C7C5DEDCDAEEEBE8F8F4F1FDF9F6FBF8F53E893C00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300327C2FDACCC90066000066
      00006600006600B2B1B0CDCBCAE2DFDDF0EDEAF9F5F3FDF9F63F8B3E00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300357E30D6C6C30066000066
      00006600006600A2A1A1B7B6B5D1CFCDE5E2E0F2EFECFAF7F43F8B3E00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009900009900009900009900007300377F32D6C6C3C9BDBABDB4
      B2B2ADACA9A6A6A3A2A1A3A3A3BCBBBAD5D3D1E8E4E2F4F0EE3E8A3D00660000
      6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000099000099000099000099000099
      0000990000990000990000990000990000990000990000990000990000990000
      9900009900009900009800008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000099000099000099000099000099000099000099000099000099
      0000990000990000990000990000990000990000990000990000990000990000
      9900009900009900009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00009300008C00018E01049408079B0F0AA0140CA4180DA61A0DA6
      1A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0D
      A61A0DA61A0AA213009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C00008000006600036B051187211EA13C29B65130C56133CB6733CB
      6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733
      CB6733CB6726BF4D009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      0066000083000079003B863AFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
      F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
      F3F2FAF3F226BB4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0006600006600317D31C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2
      C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3
      C2C2D6BCBB26B24D006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
  end
  object RadioGroup1: TRadioGroup
    Left = 814
    Top = 200
    Width = 97
    Height = 65
    Caption = 'Lan'#231'amentos'
    ItemIndex = 0
    Items.Strings = (
      'ATIVO'
      'INATIVO')
    TabOrder = 9
    OnClick = RadioGroup1Click
  end
  object RadioGroup2: TRadioGroup
    Left = 814
    Top = 384
    Width = 97
    Height = 65
    Caption = 'Lan'#231'amentos'
    ItemIndex = 0
    Items.Strings = (
      'ATIVO'
      'INATIVO')
    TabOrder = 10
    OnClick = RadioGroup2Click
  end
  object RadioGroup3: TRadioGroup
    Left = 632
    Top = 3
    Width = 97
    Height = 49
    Caption = 'Lan'#231'amentos'
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      'Inq'
      'Pro')
    TabOrder = 11
    OnClick = RadioGroup3Click
  end
  object BitBtn4: TBitBtn
    Left = 877
    Top = 15
    Width = 45
    Height = 38
    TabOrder = 12
    OnClick = BitBtn4Click
    Glyph.Data = {
      36080000424D3608000000000000360400002800000020000000200000000100
      08000000000000040000000000000000000000010000000000001C3404002434
      1C00242424001C3C0400243C0C00244404002C5C04003C5C240044543C005C5C
      54005C5C5C00646464006C6C6C0054743C007474740044840400747C74007C7C
      7C0084848400449404006C8C540054AC0400000000008C8C8C008C948C009494
      94009C9C9C00A4A4A400ACACAC00B4B4B4006CD404006CDC040074F404007CFC
      040084FC0C0084FC14007CDC24008CFC1C008CFC240094FC240094EC3C0094FC
      2C009CFC3C0094D45C009CF44C009CFC4400A4FC4C00A4FC5400ACFC6400B4FC
      6C00B4F47400BCF48400BCFC7C00B4C4A400ACCC9400BCCCAC00BCC4B400BCCC
      B400B4E48C00BCE49400BCDCA400C4F49400C4FC8C00C0C0C000002A3E00003F
      5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2FF006CCE
      FF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BABA0000D9
      D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E2A00005D
      3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FFC2006CFF
      CE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA3C0000D9
      460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E0000005D
      0000007C0000009B000000BA000000D9000000F0000024FF240048FF48006CFF
      6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA000046D9
      000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E00003F5D
      0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF4800CEFF
      6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA0000D9D9
      0000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A00005D3F
      00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC24800FFCE
      6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C0000D946
      0000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E0000005D00
      00007C0000009B000000BA000000D9000000F0000000FF242400FF484800FF6C
      6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA003C00D900
      4600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E002A005D00
      3F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48C200FF6C
      CE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00BA00D900
      D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A003E003F00
      5D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248FF00CE6C
      FF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00BA004600
      D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF003F3F3F3F3F3F
      3F3F3F3F191917171719193F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
      3F3F17171212111111121219193F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
      3F3F17171212111111121219193F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
      3F1912120E0E0C0C0C0E0E12123F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
      3F120E0E0C0C0B0B0B0C0C1111173F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
      3F120E0E0C0C0B0B0B0C0C1111173F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F17
      17110C0C0B0B0A0A0A0B0B0E0E123F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F12
      12140707020201010B0B0B0C0C1117173F3F3F3F3F3F3F3F3F3F3F3F3F3F3F18
      181E1E1E0F0F0303100C0C0C0C0E121219193F3F3F3F3F3F3F3F3F3F3F3F3F18
      181E1E1E0F0F0303100C0C0C0C0E121219193F3F3F3F3F3F3F3F3F3F3F3F3F24
      242223231F1F0606080C0C0C0C0C111117173F3F3F3F3F3F3F3F3F3F3F2B2B21
      21222323222213130517170C0C0C0E0E1111173F3F3F3F3F3F3F3F3F3F2B2B21
      21222323222213130517170C0C0C0E0E1111173F3F3F3F3F3F3F3F3F35212122
      2223232323231E1E0609090E0E0C0C0C0E0E1219193F3F3F3F3F3F3F2B222223
      232727272626222213040418180E0C0C0C0C0E12123F3F3F3F3F3F3F29262625
      252A2F2F2F2F26261F06060808110E0E0C0C0E111117173F3F3F3F3F29262625
      252A2F2F2F2F26261F06060808110E0E0C0C0E111117173F3F3F3838302D2D23
      232C393933332E2E23151503031111110E0E0C0E0E1111173F3F3F3F392E2E28
      28383F3F373731312A22220F0F01171711110E0E0E0E0E1219193F3F3F37373F
      3F3F3F3F3F3F3A3A3026261E1E0609091717110E0E0E0E1117173F3F3F37373F
      3F3F3F3F3F3F3A3A3026261E1E0609091717110E0E0E0E1117173F3F3F3F3F3F
      3F3F3F3F3F3F3F3F322E2E23231503030C0C17121211111217173F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3734342D2D231313000018191917171719193F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3734342D2D231313000018191917171719193F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3B3B34342E232313130019193F3F3F3F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3C3C33303023230F01011D1D3F3F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3F3F393E3E3131250F0F0D0D3F3F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3F3F393E3E3131250F0F0D0D3F3F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3F3F3F38383D3D3123232020353F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3C2A2A2323363F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3C2A2A2323363F3F3F3F3F3F3F3F
      3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F37373F3F3F}
  end
  object DataInicial: TDateEdit
    Left = 731
    Top = 27
    Width = 97
    Height = 24
    Ctl3D = False
    NumGlyphs = 2
    ParentCtl3D = False
    TabOrder = 13
  end
  object Edit1: TEdit
    Left = 830
    Top = 27
    Width = 43
    Height = 24
    BevelKind = bkFlat
    BorderStyle = bsNone
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 14
    Text = '1'
  end
  object sImovel: TSQLDataSet
    CommandText = 
      'select imo.COD_IMALU, '#13#10'          imo.COD_IMOBILIARIA, '#13#10'       ' +
      '   imo.DATA_LOCA, '#13#10'          imo.DATA_VCONT, '#13#10'          imo.PR' +
      'AZO_REPASSE, '#13#10'          imo.DIAPGTO,'#13#10'          imo.COD_INQUILI' +
      'NO,'#13#10'          imo.COD_PROPRIETARIO,'#13#10'          inq.NOME_INQUILI' +
      'NO,'#13#10'          pro.NOME_PROPRIETARIO   '#13#10'from IMOVEL_ALUGUEL imo' +
      ' '#13#10'inner join INQUILINOS inq '#13#10'on inq.COD_INQUILINO = imo.COD_IN' +
      'QUILINO '#13#10'inner join PROPRIETARIOS pro '#13#10'on pro.COD_PROPRIETARIO' +
      ' = imo.COD_PROPRIETARIO '#13#10'where imo.ALUGADO = '#39'S'#39
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.scSge
    Left = 48
    Top = 172
    object sImovelCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      Required = True
    end
    object sImovelCOD_IMOBILIARIA: TStringField
      FieldName = 'COD_IMOBILIARIA'
      Size = 10
    end
    object sImovelDATA_LOCA: TDateField
      FieldName = 'DATA_LOCA'
    end
    object sImovelDATA_VCONT: TDateField
      FieldName = 'DATA_VCONT'
    end
    object sImovelPRAZO_REPASSE: TIntegerField
      FieldName = 'PRAZO_REPASSE'
    end
    object sImovelDIAPGTO: TStringField
      FieldName = 'DIAPGTO'
      Size = 2
    end
    object sImovelNOME_INQUILINO: TStringField
      FieldName = 'NOME_INQUILINO'
      Size = 60
    end
    object sImovelNOME_PROPRIETARIO: TStringField
      FieldName = 'NOME_PROPRIETARIO'
      Size = 60
    end
    object sImovelCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object sImovelCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
  end
  object dspImovel: TDataSetProvider
    DataSet = sImovel
    UpdateMode = upWhereKeyOnly
    Left = 80
    Top = 172
  end
  object cdsImovel: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspImovel'
    Left = 112
    Top = 172
    object cdsImovelCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      Required = True
    end
    object cdsImovelCOD_IMOBILIARIA: TStringField
      FieldName = 'COD_IMOBILIARIA'
      Size = 10
    end
    object cdsImovelDATA_LOCA: TDateField
      FieldName = 'DATA_LOCA'
    end
    object cdsImovelDATA_VCONT: TDateField
      FieldName = 'DATA_VCONT'
    end
    object cdsImovelPRAZO_REPASSE: TIntegerField
      FieldName = 'PRAZO_REPASSE'
    end
    object cdsImovelDIAPGTO: TStringField
      FieldName = 'DIAPGTO'
      Size = 2
    end
    object cdsImovelNOME_INQUILINO: TStringField
      FieldName = 'NOME_INQUILINO'
      Size = 60
    end
    object cdsImovelNOME_PROPRIETARIO: TStringField
      FieldName = 'NOME_PROPRIETARIO'
      Size = 60
    end
    object cdsImovelCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object cdsImovelCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
  end
  object dtsrcImovel: TDataSource
    DataSet = cdsImovel
    Left = 144
    Top = 172
  end
  object cLanPro: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'status'
        ParamType = ptInput
      end>
    ProviderName = 'dLancPro'
    Left = 486
    Top = 164
    object cLanProCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProATIVO: TStringField
      FieldName = 'ATIVO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cLanProNOME_PROPRIETARIO: TStringField
      FieldName = 'NOME_PROPRIETARIO'
      ProviderFlags = []
      Size = 60
    end
    object cLanProPARCELA: TIntegerField
      FieldName = 'PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object cLanProCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
  end
  object dLancPro: TDataSetProvider
    DataSet = sLanPro
    Left = 455
    Top = 164
  end
  object sLanPro: TSQLDataSet
    CommandText = 
      'select  lanc.COD_LANCAMENTO,'#13#10'           lanc.COD_IMALU, '#13#10'     ' +
      '      lanc.COD_CONTAS, '#13#10'           lanc.VALOR, '#13#10'           lan' +
      'c.PARCELA,'#13#10'           lanc.VENCIMENTO, '#13#10'           lanc.COD_IN' +
      'QUILINO, '#13#10'           lanc.COD_PROPRIETARIO, '#13#10'           lanc.A' +
      'TIVO,'#13#10'           pro.NOME_PROPRIETARIO '#13#10' from LANCAMENTOS lanc' +
      ' '#13#10' inner join PROPRIETARIOS pro '#13#10' on pro.COD_PROPRIETARIO = la' +
      'nc.COD_PROPRIETARIO  '#13#10' where lanc.cod_imalu = :id '#13#10' and lanc.A' +
      'TIVO = :status '#13#10' and lanc.GRUPO = '#39'Proprietario'#39' '#13#10' and lanc.CO' +
      'D_CONTAS = 2'#13#10' order by lanc.VENCIMENTO'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'status'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 424
    Top = 164
    object sLanProCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProATIVO: TStringField
      FieldName = 'ATIVO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sLanProNOME_PROPRIETARIO: TStringField
      FieldName = 'NOME_PROPRIETARIO'
      ProviderFlags = []
      Size = 60
    end
    object sLanProPARCELA: TIntegerField
      FieldName = 'PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object sLanProCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
  end
  object dtsrsLanpro: TDataSource
    DataSet = cLanPro
    Left = 516
    Top = 164
  end
  object sLanInq: TSQLDataSet
    CommandText = 
      'select  lanc.COD_LANCAMENTO,'#13#10'           lanc.COD_IMALU, '#13#10'     ' +
      '      lanc.COD_CONTAS, '#13#10'           lanc.VALOR, '#13#10'           lan' +
      'c.VENCIMENTO, '#13#10'           lanc.PARCELA,'#13#10'           lanc.COD_IN' +
      'QUILINO, '#13#10'           lanc.COD_PROPRIETARIO, '#13#10'           lanc.A' +
      'TIVO,'#13#10'           inq.NOME_INQUILINO '#13#10' from LANCAMENTOS lanc '#13#10 +
      ' inner join INQUILINOS inq '#13#10' on inq.COD_INQUILINO = lanc.COD_IN' +
      'QUILINO '#13#10' where lanc.cod_imalu = :id '#13#10' and lanc.ATIVO = :statu' +
      's'#13#10' and lanc.GRUPO = '#39'Inquilino'#39' '#13#10' and lanc.COD_CONTAS = 1'#13#10' or' +
      'der by lanc.VENCIMENTO '
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'status'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 432
    Top = 356
    object IntegerField1: TIntegerField
      FieldName = 'COD_IMALU'
      ProviderFlags = [pfInUpdate]
    end
    object IntegerField2: TIntegerField
      FieldName = 'COD_CONTAS'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField1: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object DateField1: TDateField
      FieldName = 'VENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object IntegerField3: TIntegerField
      FieldName = 'COD_INQUILINO'
      ProviderFlags = [pfInUpdate]
    end
    object IntegerField4: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
      ProviderFlags = [pfInUpdate]
    end
    object StringField1: TStringField
      FieldName = 'ATIVO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sLanInqNOME_INQUILINO: TStringField
      FieldName = 'NOME_INQUILINO'
      ProviderFlags = []
      Size = 60
    end
    object sLanInqPARCELA: TIntegerField
      FieldName = 'PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object sLanInqCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
  end
  object dLanInq: TDataSetProvider
    DataSet = sLanInq
    Left = 463
    Top = 356
  end
  object cLanInq: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'status'
        ParamType = ptInput
      end>
    ProviderName = 'dLanInq'
    Left = 494
    Top = 356
    object IntegerField5: TIntegerField
      FieldName = 'COD_IMALU'
      ProviderFlags = [pfInUpdate]
    end
    object IntegerField6: TIntegerField
      FieldName = 'COD_CONTAS'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField2: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object DateField2: TDateField
      FieldName = 'VENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object IntegerField7: TIntegerField
      FieldName = 'COD_INQUILINO'
      ProviderFlags = [pfInUpdate]
    end
    object IntegerField8: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
      ProviderFlags = [pfInUpdate]
    end
    object StringField2: TStringField
      FieldName = 'ATIVO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cLanInqNOME_INQUILINO: TStringField
      FieldName = 'NOME_INQUILINO'
      ProviderFlags = []
      Size = 60
    end
    object cLanInqPARCELA: TIntegerField
      FieldName = 'PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object cLanInqCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
  end
  object dtsrcLanInq: TDataSource
    DataSet = cLanInq
    Left = 524
    Top = 356
  end
end
